;; protocol/osc-write.scm - (c) rohan drape, 2002-2005

(define (osc-write-string s port)
  (write-u8vector (osc-encode-string s) port))
(define (osc-write-bytes b port)
  (write-u8vector (osc-encode-bytes b) port))
(define (osc-write-value e port)
  (write-u8vector (osc-encode-value e) port))
(define (osc-write-type-descriptor l port)
  (write-u8vector (osc-encode-type-descriptor l) port))
(define (osc-write-message message port)
  (write-u8vector (osc-encode-message message) port))
(define (osc-write-bundle bundle port)
  (write-u8vector (osc-encode-bundle bundle) port))
(define (osc-write-packet packet port)
  (write-u8vector (osc-encode-packet packet) port))
